data segment
	string1 db 10 dup(?)
	string2 db 10 dup(?)
data ends

code segment
main proc far
	assume cs:code,ds:data,es:data

start:
	push  ds
	sub ax,ax
	push ax
	mov ax,data
	mov ds,ax
	mov es,ax
	
	mov cx,10
	lea si,string1
	lea di,string2
next:
	mov al,[si]
	mov [di],al
	inc si
	inc di
	loopnz next
	ret
main endp
code ends
	end start

